Add comment explaining why we look for simple.el on startup.

diff --git a/lisp/startup.el b/lisp/startup.el
index 3e26aa174091e9e66a4cd979cd989a8b48c9f734..10fadfbfd77f1175236e550f3d8653d00de544e9 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -647,6 +647,8 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
 
   ;; Convert preloaded file names in load-history to absolute.
   (let ((simple-file-name
+        ;; Look for simple.el or simple.elc and use their directory
+        ;; as the place where all Lisp files live.
         (locate-file "simple" load-path (get-load-suffixes)))
        lisp-dir)
     ;; Don't abort if simple.el cannot be found, but print a warning.